object frPrintForm: TfrPrintForm Left = 197 Top = 107 ActiveControl = E1 BorderIcons = [biSystemMenu, biMinimize, biMaximize, biHelp] BorderStyle = bsDialog Caption = 'Print' ClientHeight = 226 ClientWidth = 485 Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Position = poScreenCenter OnCreate = FormCreate OnDeactivate = FormDeactivate PixelsPerInch = 96 TextHeight = 13 object Label5: TLabel Left = 4 Top = 200 Width = 21 Height = 13 Caption = 'Print' FocusControl = CB2 end object GroupBox2: TGroupBox Left = 4 Top = 68 Width = 265 Height = 117 Caption = 'Pages' TabOrder = 0 object Label2: TLabel Left = 8 Top = 82 Width = 249 Height = 29 AutoSize = False Caption = 'Enter page numbers and/or page ranges, separated by commas. For ' + 'example, 1,3,5-12' WordWrap = True end object RB1: TRadioButton Left = 8 Top = 20 Width = 77 Height = 17 HelpContext = 108 Caption = 'All' Checked = True TabOrder = 0 TabStop = True end object RB2: TRadioButton Left = 8 Top = 40 Width = 93 Height = 17 HelpContext = 118 Caption = 'Current page' TabOrder = 1 end object RB3: TRadioButton Left = 8 Top = 60 Width = 77 Height = 17 HelpContext = 124 Caption = 'Numbers:' TabOrder = 2 OnClick = RB3Click end object E2: TEdit Left = 88 Top = 58 Width = 165 Height = 21 HelpContext = 133 TabOrder = 3 OnEnter = E2Click end end object Button1: TButton Left = 326 Top = 196 Width = 75 Height = 25 HelpContext = 40 Caption = 'OK' Default = True ModalResult = 1 TabOrder = 1 end object Button2: TButton Left = 406 Top = 196 Width = 75 Height = 25 HelpContext = 50 Cancel = True Caption = 'Cancel' ModalResult = 2 TabOrder = 2 end object GroupBox1: TGroupBox Left = 4 Top = 8 Width = 477 Height = 49 Caption = 'Printer' TabOrder = 3 object Label4: TLabel Left = 8 Top = 20 Width = 28 Height = 13 Caption = 'Name' FocusControl = CB1 end object Image1: TImage Left = 48 Top = 21 Width = 18 Height = 16 AutoSize = True Picture.Data = {} Visible = False end object CB1: TComboBox Left = 72 Top = 17 Width = 305 Height = 22 HelpContext = 142 Style = csOwnerDrawFixed ItemHeight = 16 TabOrder = 0 OnClick = CB1Click OnDrawItem = CB1DrawItem end object PropButton: TButton Left = 392 Top = 17 Width = 75 Height = 22 HelpContext = 152 Caption = 'Setup...' TabOrder = 1 OnClick = PropButtonClick end end object GroupBox3: TGroupBox Left = 280 Top = 68 Width = 201 Height = 117 Caption = 'Copies' TabOrder = 4 object Label1: TLabel Left = 8 Top = 24 Width = 83 Height = 13 Caption = 'Number of copies' FocusControl = E1 end object CollateImg: TImage Left = 16 Top = 52 Width = 74 Height = 53 AutoSize = True Picture.Data = {} Visible = False end object NonCollateImg: TImage Left = 8 Top = 60 Width = 92 Height = 40 AutoSize = True Picture.Data = {} Visible = False end object Label3: TLabel Left = 132 Top = 64 Width = 61 Height = 41 AutoSize = False Caption = 'Collate' WordWrap = True OnClick = Label3Click OnDblClick = Label3Click end object PB1: TPaintBox Left = 8 Top = 52 Width = 92 Height = 53 OnPaint = PB1Paint end object E1: TEdit Left = 128 Top = 20 Width = 49 Height = 21 HelpContext = 99 TabOrder = 0 Text = '1' end object Panel1: TPanel Left = 158 Top = 22 Width = 17 Height = 17 BevelOuter = bvNone TabOrder = 1 object frSpeedButton1: TfrSpeedButton Left = 0 Top = 0 Width = 17 Height = 8 Glyph.Data = { 86000000424D8600000000000000760000002800000007000000040000000100 0400000000001000000000000000000000001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFF0F000 00F0FF000FF0FFF0FFF0} Spacing = 0 OnClick = frSpeedButton1Click end object frSpeedButton2: TfrSpeedButton Left = 0 Top = 9 Width = 17 Height = 8 Glyph.Data = { 86000000424D8600000000000000760000002800000007000000040000000100 0400000000001000000000000000000000001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFF0FFF0FF00 0FF0F00000F0FFFFFFF0} OnClick = frSpeedButton2Click end end object CollateCB: TCheckBox Left = 112 Top = 62 Width = 17 Height = 17 HelpContext = 188 State = cbChecked TabOrder = 2 OnClick = CollateCBClick end end object CB2: TComboBox Left = 48 Top = 196 Width = 155 Height = 21 HelpContext = 196 Style = csDropDownList ItemHeight = 13 TabOrder = 5 end end